home *** CD-ROM | disk | FTP | other *** search
/ Quake Busters / QUAKE.bin / pc / shared.dir / 00852_Script_(Bt) down menu < prev    next >
Text File  |  1996-06-10  |  731b  |  33 lines
  1. -- will go to main menu
  2.  
  3.  
  4. on mouseDown
  5.   puppetSound "Mouse Down"
  6.   updateStage
  7.   set the castnum of sprite the clickOn to ¼
  8. the number of cast "mr"
  9.   updatestage
  10.   repeat while the stilldown
  11.     if not rollover(the clickOn) then ¼
  12. set the castnum of sprite the clickOn to ¼
  13. the number of cast "my"
  14.     updateStage
  15.     if rollover(the clickOn) then nothing
  16.   end repeat
  17.   puppetSound 0
  18. end mouseDown
  19.  
  20. on mouseUp
  21.   set the castnum of sprite the clickOn to ¼
  22. the number of cast "my"
  23.   if rollover(44) then puppetSound "Mouse Up"
  24.   updateStage
  25.   repeat while soundBusy(1)
  26.     nothing
  27.   end repeat
  28.   puppetSound 0
  29.   updateStage
  30.   if rollover(44) then go to ¼
  31. frame "Yo" of movie "QBENG.DIR"
  32. end mouseUp
  33.